<%

Function rodada_data()

		id_rodada = rodada_get_atual()
		
		DIM data
		data=""

		str = "SELECT data from rodadas_jogos where id_rodada="&id_rodada&" order by data asc LIMIT 1"
		Set rs = conexao_geral.Execute(str)	
		
		if not rs.eof then
		
			data = data_formatada(data_pt_en(rs("data")),"M/A")
			
		End If
		
		rodada_data = data

End Function

%>